CAADiameters_AsteroidDiameter <-
function(H, A){
.Call("CAADiameters_AsteroidDiameter", H, A)
}
